home *** CD-ROM | disk | FTP | other *** search
/ Amiga Collections: Software of the Month Club / Amiga General Interest Volume 222 (1995)(SOMC)(Disk 3 of y)[SMCxxxC30Ix].zip / Amiga General Interest Volume 222 (1995)(SOMC)(Disk 3 of y)[SMCxxxC30Ix].adf / Install_to_HD < prev    next >
Text File  |  1995-11-05  |  3KB  |  145 lines
  1. ; $VER: Install Eldritch V1.33 (BETA)     (24 October 1995)
  2. ; This script can be distributed with the Eldritch game by
  3. ; James N. Weatherall (WEZ of SCROTUM)
  4.  
  5. ; Thanks to Harald Fricke for his comments & improvements to this script!
  6.  
  7. ; ask where to install Eldritch
  8. (set @default-dest
  9.  (askdir
  10.    (prompt "Please select the Directory where you would like to install Eldritch."
  11.            "This script will create an Eldritch directory there.")
  12.    (help @askdir-help)
  13.  
  14.    ; default path is games: if exists, installer's default otherwise.
  15.  
  16.    (default (if (exists "games:" (noreq)) "Games:" @default-dest))
  17.  )
  18. )
  19.  
  20. ; Append Eldritch directory name to default destination ...
  21. (set @default-dest
  22.    (tackon @default-dest "Eldritch")
  23. )
  24.  
  25. ; Check that the install directory exists ... otherwise create it.
  26. (if (not (exists @default-dest))s
  27.    (makedir @default-dest (infos))
  28. )
  29.  
  30. (working "Installing Eldritch Program")
  31. (copyfiles
  32.    (prompt "Eldritch")
  33.    (help @copyfiles-help)
  34.    (source "Eldritch")
  35.    (dest @default-dest)
  36.    (infos)
  37. )
  38.  
  39. (copyfiles
  40.    (prompt "Bin directory")
  41.    (help @copyfiles-help)
  42.    (source "Bin")
  43.    (dest (tackon @default-dest "Bin"))
  44.    (infos)
  45.    (all)
  46. )
  47.  
  48. (copyfiles
  49.    (prompt "Displays directory")
  50.    (help @copyfiles-help)
  51.    (source "Displays")
  52.    (dest (tackon @default-dest "Displays"))
  53.    (infos)
  54.    (all)
  55. )
  56.  
  57. (copyfiles
  58.    (prompt "Graphics directory")
  59.    (help @copyfiles-help)
  60.    (source "Graphics")
  61.    (dest (tackon @default-dest "Graphics"))
  62.    (infos)
  63.    (all)
  64. )
  65.  
  66. (copyfiles
  67.    (prompt "Sound directory")
  68.    (help @copyfiles-help)
  69.    (source "Sound")
  70.    (dest (tackon @default-dest "Sound"))
  71.    (infos)
  72.    (all)
  73. )
  74.  
  75. (copyfiles
  76.    (prompt "Install Eldritch.Guide?")
  77.    (help @copyfiles-help)
  78.    (source "Eldritch.Guide")
  79.    (dest @default-dest)
  80.    (infos)
  81.    (confirm)
  82. )
  83.  
  84. (copyfiles
  85.    (prompt "Templates directory")
  86.    (help @copyfiles-help)
  87.    (source "Templates")
  88.    (dest (tackon @default-dest "Templates"))
  89.    (infos)
  90.    (all)
  91. )
  92.  
  93. (copyfiles
  94.    (prompt "Install City directory?")
  95.    (help @copyfiles-help)
  96.    (source "Cities")
  97.    (dest (tackon @default-dest "Cities"))
  98.    (infos)
  99.    (all)
  100.    (confirm)
  101. )
  102.  
  103. (copyfiles
  104.    (prompt "Intro sequence")
  105.    (help @copyfiles-help)
  106.    (source "Intro")
  107.    (dest @default-dest)
  108.    (infos)
  109. )
  110.  
  111. (copyfiles
  112.    (prompt "Template Generator")
  113.    (help @copyfiles-help)
  114.    (source "TempGen")
  115.    (dest @default-dest)
  116.    (infos)
  117. )
  118.  
  119. ; I have chosen to copy Medplayer library using the copylib command,
  120. ; but unfortunately Amos library doesn't like this, so I only install
  121. ; it if the user wants me to!
  122.  
  123. (copylib
  124.    (prompt "Installing medplayer.library")
  125.    (help @copylib-help)
  126.    (source "Libs/medplayer.library")
  127.    (dest "Libs:")
  128.    (confirm)
  129. )
  130.  
  131. (if (not(exists "Libs:amos.library"))
  132.    (copyfiles
  133.       (prompt "Installing AMOS.library")
  134.       (help @copyfile-help)
  135.       (source "Libs/amos.library")
  136.       (dest "Libs:")
  137.       (confirm)
  138.    )
  139. )
  140.  
  141. (exit)
  142.  
  143.  
  144.  
  145.